home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 007 / 8087.arc / 87MAC.LIB < prev    next >
Encoding:
Text File  |  1985-02-13  |  18.4 KB  |  632 lines
  1. ST0     EQU     0        ; Register equates
  2. ST1     EQU     1        ;
  3. ST2     EQU     2        ;  These equates reference the 8087 NDP
  4. ST3     EQU     3        ;  registers, and can form a floating point stack !
  5. ST4     EQU     4        ;
  6. ST5     EQU     5        ;
  7. ST6     EQU     6        ;
  8. ST7     EQU     7        ;
  9.  
  10. FLD     MACRO SOURCE
  11.         IFB   <SOURCE>
  12.               DB    09BH,0D9H,0C1H              ; FLD ST(1)
  13.               EXITM
  14.         ELSE
  15.               IFE   TYPE SOURCE
  16.                     DB   09BH,0D9H,0C0H+SOURCE  ; FLD ST(i)
  17.               ENDIF
  18.               IFE   4-TYPE SOURCE
  19.                     DB   09BH
  20.                     ESC  8,SOURCE               ; FLD short-real
  21.               ENDIF
  22.               IFE   8-TYPE SOURCE
  23.                     DB   09BH
  24.                     ESC  40,SOURCE              ; FLD long-real
  25.               ENDIF
  26.               IFE   10-TYPE SOURCE
  27.                     DB   09BH
  28.                     ESC  01DH,SOURCE            ; FLD temp-real
  29.               ENDIF
  30.         ENDIF
  31.         ENDM
  32.  
  33. FILD    MACRO SOURCE
  34.         IFE   2-TYPE SOURCE
  35.               DB    09BH
  36.               ESC   38H,SOURCE                  ; FILD word
  37.         ENDIF
  38.         IFE   4-TYPE SOURCE
  39.               DB    09BH
  40.               ESC   18H,SOURCE                  ; FILD short-integer
  41.         ENDIF
  42.         IFE   8-TYPE SOURCE
  43.               DB    09BH
  44.               ESC   03DH,SOURCE                 ; FILD long-integer
  45.         ENDIF
  46.         ENDM
  47.  
  48. FBLD    MACRO SOURCE
  49.         DB    09BH
  50.         ESC   03CH,SOURCE                       ; FBLD BCD-number
  51.         ENDM
  52.  
  53. FST     MACRO DESTINATION
  54.         IFE   TYPE DESTINATION
  55.               DB    09BH,0DDH,0D0H+DESTINATION  ; FST ST(i)
  56.         ENDIF
  57.         IFE   4-TYPE DESTINATION
  58.               DB    09BH
  59.               ESC   10,DESTINATION              ; FST short-real
  60.         ENDIF
  61.         IFE   8-TYPE DESTINATION
  62.               DB    09BH
  63.               ESC   02AH,DESTINATION            ; FST long-real
  64.         ENDIF
  65.         ENDM
  66. FIST    MACRO DESTINATION
  67.         IFE   2-TYPE DESTINATION
  68.               DB    09BH
  69.               ESC   03AH,DESTINATION            ; FIST word
  70.         ENDIF
  71.         IFE   4-TYPE DESTINATION
  72.               DB    09BH
  73.               ESC   01AH,DESTINATION            ; FIST short-integer
  74.         ENDIF
  75.         ENDM
  76.  
  77. FSTP    MACRO DESTINATION
  78.         IFE   TYPE DESTINATION
  79.               DB    09BH,0DDH,0D8H+DESTINATION  ; FSTP ST(i)
  80.         ENDIF
  81.         IFE   4-TYPE DESTINATION
  82.               DB    09BH
  83.               ESC   0BH,DESTINATION             ; FSTP short-real
  84.         ENDIF
  85.         IFE   8-TYPE DESTINATION
  86.               DB    09BH
  87.               ESC   02BH,DESTINATION            ; FSTP long-real
  88.         ENDIF
  89.         IFE   10-TYPE DESTINATION
  90.               DB    09BH
  91.               ESC   01FH,DESTINATION            ; FSTP temporary-real
  92.         ENDIF
  93.         ENDM
  94.  
  95. FISTP   MACRO DESTINATION
  96.         IFE   2-TYPE DESTINATION
  97.               DB    09BH
  98.               ESC   03BH,DESTINATION            ; FISTP word
  99.         ENDIF
  100.         IFE   4-TYPE DESTINATION
  101.               DB    09BH
  102.               ESC   01BH,DESTINATION            ; FISTP short-integer
  103.         ENDIF
  104.         IFE   8-TYPE DESTINATION
  105.               DB    09BH
  106.               ESC   03FH,DESTINATION            ; FISTP long-integer
  107.         ENDIF
  108.         ENDM
  109.  
  110. FBSTP   MACRO DESTINATION
  111.         DB    09BH
  112.         ESC   03EH,DESTINATION                  ; FBSTP BCD-number
  113.         ENDM
  114.  
  115. FXCH    MACRO DESTINATION
  116.         IFB   <DESTINATION>
  117.               DB    09BH,0D9H,0C9H              ; FXCH ST(1)
  118.               EXITM
  119.         ELSE
  120.               DB    09BH,0D9H,0C8H+DESTINATION  ; FXCH ST(i)
  121.         ENDIF
  122.         ENDM
  123. FCOM    MACRO SOURCE
  124.         IFB   <SOURCE>
  125.               DB    09BH,0D8H,0D1H              ; FCOM ST(1)
  126.               EXITM
  127.         ELSE
  128.               IFE   TYPE SOURCE
  129.                     DB    09BH,0D8H,0D0H+SOURCE ; FCOM ST(i)
  130.               ENDIF
  131.               IFE   4-TYPE SOURCE
  132.                     DB    09BH
  133.                     ESC   2,SOURCE              ; FCOM short-real
  134.               ENDIF
  135.               IFE   8-TYPE SOURCE
  136.                     DB    09BH
  137.                     ESC   34,SOURCE             ; FCOM long-real
  138.               ENDIF
  139.         ENDIF
  140.         ENDM
  141.  
  142. FICOM   MACRO SOURCE
  143.         IFE   2-TYPE SOURCE
  144.               DB    09BH
  145.               ESC   032H,SOURCE                 ; FICOM word
  146.         ENDIF
  147.         IFE   4-TYPE SOURCE
  148.               DB    09BH
  149.               ESC   012H,SOURCE                 ; FICOM short-integer
  150.         ENDIF
  151.         ENDM
  152.  
  153. FCOMP   MACRO SOURCE
  154.         IFB   <SOURCE>
  155.               DB    09BH,0D8H,0D9H               ; FCOMP ST(1)
  156.               EXITM
  157.         ELSE
  158.               IFE   TYPE SOURCE
  159.                     DB    09BH,0D8H,0D8H+SOURCE ; FCOMP ST(i)
  160.               ENDIF
  161.               IFE   4-TYPE SOURCE
  162.                     DB    09BH
  163.                     ESC   3,SOURCE              ; FCOMP short-real
  164.               ENDIF
  165.               IFE   8-TYPE SOURCE
  166.                     DB    09BH
  167.                     ESC   35,SOURCE             ; FCOMP long-real
  168.               ENDIF
  169.         ENDIF
  170.         ENDM
  171.  
  172. FICOMP  MACRO SOURCE
  173.         IFE   2-TYPE SOURCE
  174.               DB    09BH
  175.               ESC   033H,SOURCE                 ; FICOMP word
  176.         ENDIF
  177.         IFE   4-TYPE SOURCE
  178.               DB    09BH
  179.               ESC   013H,SOURCE                 ; FICOMP short-integer
  180.         ENDIF
  181.         ENDM
  182.  
  183. FCOMPP  MACRO
  184.         DB    09BH,0DEH,0D9H                    ; FCOMPP
  185.         ENDM
  186.  
  187. FTST    MACRO
  188.         DB    09BH,0D9H,0E4H                    ; FTST
  189.         ENDM
  190.  
  191. FXAM    MACRO
  192.         DB    09BH,0D9H,0E5H                    ; FXAM
  193.         ENDM
  194.  
  195. FADD    MACRO DESTINATION,SOURCE
  196.         IFB   <DESTINATION>
  197.               DB    09BH,0D8H,0C1H              ; FADD
  198.               EXITM
  199.         ELSE
  200.               IFB   <SOURCE>
  201.                     IFE   TYPE DESTINATION
  202.                           DB      09BH,0D8H,0C0H+DESTINATION ; FADD ST(i)
  203.                     ENDIF
  204.                     IFE   4-TYPE DESTINATION
  205.                           DB    09BH
  206.                           ESC   0,DESTINATION   ; FADD short-real
  207.                     ENDIF
  208.                     IFE   8-TYPE DESTINATION
  209.                           DB    09BH
  210.                           ESC   32,DESTINATION  ; FADD long-real
  211.                     ENDIF
  212.                     EXITM
  213.               ELSE
  214.                     IFE   DESTINATION
  215.                           DB    09BH,0D8H,0C0H+SOURCE ; FADD ST,ST(i)
  216.                     ELSE
  217.                           DB    09BH,0DCH,0C0H+DESTINATION ; FADD ST(i),ST
  218.                     ENDIF
  219.               ENDIF
  220.         ENDIF
  221.         ENDM
  222.  
  223. FIADD   MACRO SOURCE
  224.         IFE   2-TYPE SOURCE
  225.               DB    09BH
  226.               ESC   030H,SOURCE                 ; FIADD word
  227.         ENDIF
  228.         IFE   4-TYPE SOURCE
  229.               DB    09BH
  230.               ESC   010H,SOURCE                 ; FIADD short-integer
  231.         ENDIF
  232.         ENDM
  233.  
  234. FADDP   MACRO DESTINATION,SOURCE
  235.         DB    09BH,0DEH,0C0H+DESTINATION        ; FADDP ST(i),ST
  236.         ENDM
  237.  
  238. FSUB    MACRO DESTINATION,SOURCE
  239.         IFB   <DESTINATION>
  240.               DB    09BH,0D8H,0E1H              ; FSUB
  241.               EXITM
  242.         ELSE
  243.               IFB   <SOURCE>
  244.                     IFE   TYPE DESTINATION
  245.                           DB    09BH,0D8H,0E0H+DESTINATION ; FSUB ST(i)
  246.                     ENDIF
  247.                     IFE   4-TYPE DESTINATION
  248.                           DB    09BH
  249.                           ESC   4,DESTINATION   ; FSUB short-real
  250.                     ENDIF
  251.                     IFE   8-TYPE DESTINATION
  252.                           DB    09BH
  253.                           ESC   36,DESTINATION  ; FSUB long-real
  254.                     ENDIF
  255.                     EXITM
  256.               ELSE
  257.                     IFE   DESTINATION
  258.                           DB    09BH,0D8H,0E0H+SOURCE ; FSUB ST,ST(i)
  259.                     ELSE
  260.                           DB    09BH,0DCH,0E0H+DESTINATION ; FSUB ST(i),ST
  261.                     ENDIF
  262.               ENDIF
  263.         ENDIF
  264.         ENDM
  265.  
  266. FISUB   MACRO SOURCE
  267.         IFE   2-TYPE SOURCE
  268.               DB    09BH
  269.               ESC   034H,SOURCE                 ; FISUB word
  270.         ENDIF
  271.         IFE   4-TYPE SOURCE
  272.               DB    09BH
  273.               ESC   014H,SOURCE                 ; FISUB short-integer
  274.         ENDIF
  275.         ENDM
  276.  
  277. FSUBP   MACRO DESTINATION,SOURCE
  278.               DB    09BH,0DEH,0E0H+DESTINATION  ; FSUBP ST(i),ST
  279.         ENDM
  280.  
  281. FSUBR   MACRO DESTINATION,SOURCE
  282.         IFB   <DESTINATION>
  283.               DB    09BH,0D8H,0E9H              ; FSUBR
  284.               EXITM
  285.         ELSE
  286.               IFB   <SOURCE>
  287.                     IFE   TYPE DESTINATION
  288.                           DB    09BH,0D8H,0E8H+DESTINATION ; FSUBR ST(i)
  289.                     ENDIF
  290.                     IFE   4-TYPE DESTINATION
  291.                           DB    09BH
  292.                           ESC   5,DESTINATION   ; FSUBR short-real
  293.                     ENDIF
  294.                     IFE   8-TYPE DESTINATION
  295.                           DB    09BH
  296.                           ESC   37,DESTINATION  ; FSUBR long-real
  297.                     ENDIF
  298.                     EXITM
  299.               ELSE
  300.                     IFE   DESTINATION
  301.                           DB    09BH,0D8H,0E8H+SOURCE ; FSUBR ST,ST(i)
  302.                     ELSE
  303.                           DB    09BH,0DCH,0E8H+DESTINATION ; FSUBR ST(i),ST
  304.                     ENDIF
  305.               ENDIF
  306.         ENDIF
  307.         ENDM
  308.  
  309. FISUBR  MACRO SOURCE
  310.         IFE   2-TYPE SOURCE
  311.               DB    09BH
  312.               ESC   035H,SOURCE                 ; FISUBR word
  313.         ENDIF
  314.         IFE     4-TYPE SOURCE
  315.               DB    09BH
  316.               ESC   015H,SOURCE                 ; FISUBR short-integer
  317.         ENDIF
  318.         ENDM
  319.  
  320. FSUBRP  MACRO DESTINATION,SOURCE
  321.         DB    09BH,0DEH,0E8H+DESTINATION        ; FSUBRP ST(i),ST
  322.         ENDM
  323.  
  324. FMUL    MACRO DESTINATION,SOURCE
  325.         IFB   <DESTINATION>
  326.               DB    09BH,0D8H,0C9H              ; FMUL
  327.               EXITM
  328.         ELSE
  329.               IFB   <SOURCE>
  330.                     IFE   TYPE DESTINATION
  331.                           DB    09BH,0D8H,0C8H+DESTINATION ; FMUL ST(i)
  332.                     ENDIF
  333.                     IFE   4-TYPE DESTINATION
  334.                           DB    09BH
  335.                           ESC   1,DESTINATION   ; FMUL short-real
  336.                     ENDIF
  337.                     IFE   8-TYPE DESTINATION
  338.                           DB    09BH
  339.                           ESC   33,DESTINATION  ; FMUL long-real
  340.                     ENDIF
  341.                     EXITM
  342.               ELSE
  343.                     IFE   DESTINATION
  344.                           DB    09BH,0D8H,0C8H+SOURCE ; FMUL ST,ST(i)
  345.                     ELSE
  346.                           DB    09BH,0DCH,0C8H+DESTINATION ; FMUL ST(i),ST
  347.                     ENDIF
  348.               ENDIF
  349.         ENDIF
  350.         ENDM
  351.  
  352. FIMUL   MACRO SOURCE
  353.         IFE   2-TYPE SOURCE
  354.               DB    09BH
  355.               ESC   031H,SOURCE                 ; FIMUL word
  356.         ENDIF
  357.         IFE   4-TYPE SOURCE
  358.               DB    09BH
  359.               ESC   011H,SOURCE                 ; FIMUL short-integer
  360.         ENDIF
  361.         ENDM
  362.  
  363. FMULP   MACRO DESTINATION,SOURCE
  364.         DB    09BH,0DEH,0C8H+DESTINATION        ; FMULP ST(i),ST
  365.         ENDM
  366.  
  367. FDIV    MACRO DESTINATION,SOURCE
  368.         IFB   <DESTINATION>
  369.               DB    09BH,0D8H,0F1H              ; FDIV
  370.               EXITM
  371.         ELSE
  372.               IFB   <SOURCE>
  373.                     IFE   TYPE DESTINATION
  374.                           DB    09BH,0D8H,0F0H+DESTINATION ; FDIV ST(i)
  375.                     ENDIF
  376.                     IFE   4-TYPE DESTINATION
  377.                           DB    09BH
  378.                           ESC   6,DESTINATION   ; FDIV short-real
  379.                     ENDIF
  380.                     IFE   8-TYPE DESTINATION
  381.                           DB    09BH
  382.                           ESC   38,DESTINATION  ; FDIV long-real
  383.                     ENDIF
  384.                     EXITM
  385.               ELSE
  386.                     IFE   DESTINATION
  387.                           DB    09BH,0D8H,0F0H+SOURCE ; FDIV ST,ST(i)
  388.                     ELSE
  389.                           DB    09BH,0DCH,0F0H+DESTINATION ; FDIV ST(i),ST
  390.                     ENDIF
  391.               ENDIF
  392.         ENDIF
  393.         ENDM
  394.  
  395. FIDIV   MACRO SOURCE
  396.         IFE   2-TYPE SOURCE
  397.               DB    09BH
  398.               ESC   036H,SOURCE                 ; FIDIV word
  399.         ENDIF
  400.         IFE     4-TYPE SOURCE
  401.               DB    09BH
  402.               ESC   016H,SOURCE                 ; FIDIV short-integer
  403.         ENDIF
  404.         ENDM
  405.  
  406. FDIVP   MACRO DESTINATION,SOURCE
  407.         DB    09BH,0DEH,0F0H+DESTINATION        ; FDIVP ST(i),ST
  408.         ENDM
  409.  
  410. FDIVR   MACRO DESTINATION,SOURCE
  411.         IFB   <DESTINATION>
  412.               DB    09BH,0D8H,0F9H              ; FDIVR
  413.               EXITM
  414.         ELSE
  415.               IFB   <SOURCE>
  416.                     IFE   TYPE DESTINATION
  417.                           DB    09BH,0D8H,0F8H+DESTINATION ; FDIVR ST(i)
  418.                     ENDIF
  419.                     IFE   4-TYPE DESTINATION
  420.                           DB    09BH
  421.                           ESC   7,DESTINATION   ; FDIVR short-real
  422.                     ENDIF
  423.                     IFE   8-TYPE DESTINATION
  424.                           DB    09BH
  425.                           ESC   39,DESTINATION  ; FDIVR long-real
  426.                     ENDIF
  427.                     EXITM
  428.               ELSE
  429.                     IFE   DESTINATION
  430.                           DB    09BH,0D8H,0F8H+SOURCE ; FDIVR ST,ST(i)
  431.                     ELSE
  432.                           DB    09BH,0DCH,0F8H+DESTINATION ; FDIVR ST(i),ST
  433.                     ENDIF
  434.               ENDIF
  435.         ENDIF
  436.         ENDM
  437.  
  438. FIDIVR  MACRO SOURCE
  439.         IFE   2-TYPE SOURCE
  440.               DB    09BH
  441.               ESC   037H,SOURCE                 ; FIDIVR word
  442.         ENDIF
  443.         IFE   4-TYPE SOURCE
  444.               DB    09BH
  445.               ESC   017H,SOURCE                 ; FIDIVR short-integer
  446.         ENDIF
  447.         ENDM
  448.  
  449. FDIVRP  MACRO DESTINATION,SOURCE
  450.         DB    09BH,0DEH,0F8H+DESTINATION        ; FDIVRP ST(i),ST
  451.         ENDM
  452.  
  453. FSQRT   MACRO
  454.         DB    09BH,0D9H,0FAH                    ; FSQRT
  455.         ENDM
  456.  
  457. FSCALE  MACRO
  458.         DB    09BH,0D9H,0FDH                    ; FSCALE
  459.         ENDM
  460.  
  461. FPREM   MACRO
  462.         DB    09BH,0D9H,0F8H                    ; FPREM
  463.         ENDM
  464.  
  465. FRNDINT MACRO
  466.         DB    09BH,0D9H,0FCH                    ; FRNDINT
  467.         ENDM
  468.  
  469. FXTRACT MACRO
  470.         DB    09BH,0D9H,0F4H                    ; FXTRACT
  471.         ENDM
  472.  
  473. FABS    MACRO
  474.         DB    09BH,0D9H,0E1H                    ; FABS
  475.         ENDM
  476.  
  477. FCHS    MACRO
  478.         DB    09BH,0D9H,0E0H                    ; FCHS
  479.         ENDM
  480.  
  481. FPTAN   MACRO
  482.         DB    09BH,0D9H,0F2H                    ; FPTAN
  483.         ENDM
  484.  
  485. FPATAN  MACRO
  486.         DB    09BH,0D9H,0F3H                    ; FPATAN
  487.         ENDM
  488.  
  489. F2XM1   MACRO
  490.         DB    09BH,0D9H,0F0H                    ; F2XM1
  491.         ENDM
  492.  
  493. FYL2X   MACRO
  494.         DB    09BH,0D9H,0F1H                    ; FYL2X
  495.         ENDM
  496.  
  497. FYL2XP1 MACRO
  498.         DB    09BH,0D9H,0F9H                    ; FYL2XP1
  499.         ENDM
  500.  
  501. FLDZ    MACRO
  502.         DB    09BH,0D9H,0EEH                    ; FLDZ
  503.         ENDM
  504.  
  505. FLD1    MACRO
  506.         DB    09BH,0D9H,0E8H                    ; FLD1
  507.         ENDM
  508.  
  509. FLDPI   MACRO
  510.         DB    09BH,0D9H,0EBH                    ; FLDPI
  511.         ENDM
  512.  
  513. FLDL2T  MACRO
  514.         DB    09BH,0D9H,0E9H                    ; FLDL2T
  515.         ENDM
  516.  
  517. FLDL2E  MACRO
  518.         DB    09BH,0D9H,0EAH                    ; FLDL2E
  519.         ENDM
  520.  
  521. FLDLG2  MACRO
  522.         DB    09BH,0D9H,0ECH                    ; FLDLG2
  523.         ENDM
  524.  
  525. FLDLN2  MACRO
  526.         DB    09BH,0D9H,0EDH                    ; FLDLN2
  527.         ENDM
  528.  
  529. FINIT   MACRO
  530.         DB    09BH,0DBH,0E3H                    ; FINIT
  531.         ENDM
  532.  
  533. FNINIT  MACRO
  534.         DB    0DBH,0E3H                         ; FNINIT
  535.         ENDM
  536.  
  537. FENI    MACRO
  538.         DB    09BH,0DBH,0E0H                    ; FENI
  539.         ENDM
  540.  
  541. FNENI   MACRO
  542.         DB    0DBH,0E0H                         ; FNENI
  543.         ENDM
  544.  
  545. FDISI   MACRO
  546.         DB    09BH,0DBH,0E1H                    ; FDISI
  547.         ENDM
  548.  
  549. FNDISI  MACRO
  550.         DB    0DBH,0E1H                         ; FNDISI
  551.         ENDM
  552.  
  553. FLDCW   MACRO SOURCE
  554.         DB    09BH
  555.         ESC   0DH,SOURCE                        ; FLDCW word
  556.         ENDM
  557.  
  558. FSTCW   MACRO DESTINATION
  559.         DB    09BH
  560.         ESC   0FH,DESTINATION                   ; FSTCW word
  561.         ENDM
  562.  
  563. FNSTCW  MACRO DESTINATION
  564.         ESC   0FH,DESTINATION                   ; FNSTCW word
  565.         ENDM
  566.  
  567. FSTSW   MACRO DESTINATION
  568.         DB    09BH
  569.         ESC   02FH,DESTINATION                  ; FSTSW word
  570.         ENDM
  571.  
  572. FNSTSW  MACRO DESTINATION
  573.         ESC   02FH,DESTINATION                  ; FNSTSW word
  574.         ENDM
  575.  
  576. FCLEX   MACRO
  577.         DB    09BH,0DBH,0E2H                    ; FCLEX
  578.         ENDM
  579.  
  580. FNCLEX  MACRO
  581.         DB    0DBH,0E2H                         ; FNCLEX
  582.         ENDM
  583.  
  584. FSTENV  MACRO DESTINATION
  585.         DB    09BH
  586.         ESC   0EH,DESTINATION                   ; FSTENV big-area
  587.         ENDM
  588.  
  589. FNSTENV MACRO DESTINATION
  590.         ESC   0EH,DESTINATION                   ; FNSTENV big-area
  591.         ENDM
  592.  
  593. FLDENV  MACRO SOURCE
  594.         DB    09BH
  595.         ESC   0CH,SOURCE                        ; FLDENV big-area
  596.         ENDM
  597.  
  598. FSAVE   MACRO DESTINATION
  599.         DB    09BH
  600.         ESC   02EH,DESTINATION                  ; FSAVE bigger-area
  601.         ENDM
  602.  
  603. FNSAVE  MACRO DESTINATION
  604.         ESC   02EH,DESTINATION                  ; FNSAVE bigger-area
  605.         ENDM
  606.  
  607. FRSTOR  MACRO SOURCE
  608.         DB    09BH
  609.         ESC   02CH,SOURCE                       ; FRSTOR bigger-area
  610.         ENDM
  611.  
  612. FINCSTP MACRO
  613.         DB    09BH,0D9H,0F7H                    ; FINCSTP
  614.         ENDM
  615.  
  616. FDECSTP MACRO
  617.         DB    09BH,0D9H,0F6H                    ; FDECSTP
  618.         ENDM
  619.  
  620. FFREE   MACRO SOURCE
  621.         DB    09BH,0DDH,0C0H+SOURCE             ; FFREE ST(i)
  622.         ENDM
  623.  
  624. FNOP    MACRO
  625.         DB    0D9H,0D0H                         ; FNOP
  626.         ENDM
  627.  
  628. FWAIT   MACRO
  629.         DB    09BH                              ; FWAIT
  630.         ENDM
  631.  
  632.